home *** CD-ROM | disk | FTP | other *** search
/ Know Your Hockey - The Greatest Player Resource / Know Your Hockey: The Greatest Player Resource.iso / hockey / director / ktgcst.cst / 00044_Script_44 < prev    next >
Text File  |  1998-09-28  |  1KB  |  59 lines
  1. global gmusic,gsoundlevel,gb,defaultsnd,dlflag,gbuttonstate, gDNS, gProduct
  2. on StartMovie
  3. --  if the moviename contains "KTG" then
  4. --    if AxiaRegIsRegistered() > 0 or gDNS = gProduct then
  5. --      nothing -- just carry on
  6. --    else
  7. --      play movie "RegKTG"
  8. --    end if
  9. --  end if
  10.   
  11.   set gb = new(script "ButtonsObject")  
  12.   initPrompts
  13.   cursor -1
  14.   repeat with x = 3 to 47
  15.     PuppetSprite x,1
  16.   end repeat
  17.   
  18.   initrolloverkit
  19.   initButtonKit
  20.   if dlflag = 1 then 
  21.     set dlflag = empty
  22.     setat(gbuttonstate,38,2)
  23.     set the blend of sprite 38 = 100
  24.   end if
  25.   
  26.   set MyMovie = the movieName
  27.   set the itemDelimiter= "."
  28.   set mymovie = item 1 of mymovie
  29.   case mymovie of
  30.     "teamply","KTGskil":
  31.       set a = "guide"
  32.     "main","BTG":
  33.       set a = "coach"
  34.     "KTG_r_1","KTG_r_2","KTG_r_3":
  35.       set a = "coach"
  36.     "KTG_f_1","KTG_f_2","KTG_f_3":  
  37.       set a = "coach"
  38.     otherwise
  39.       set a = "guide"
  40.   end case
  41.   set the itemDelimiter= ","
  42.   -- start bg sound
  43.   bgmusic 
  44.   if defaultsnd > EMPTY then
  45.     LoadFirstSoundst(defaultsnd)
  46.     set defaultsnd = empty
  47.   else
  48.     LoadFirstSounds(a)
  49.   end if
  50. end
  51.  
  52.  
  53. on stopmovie
  54.   set the mouseUpScript = EMPTY
  55.   puppetsound 1,0
  56.   puppetsound 2,0
  57.   cursor 4
  58. end
  59.